CONOSCERE 

IL COMPUTER 
DIRETTAMENTE 
DAL COMPUTER 




LEZIONE 


PROGRAMMA 


per Commodore Vie 20 e 64 


CONOSCERE 
IL COMPUTER 
DIRETTAMENTE 
DAL COMPUTER 


CONOSCERE 
IL COMPUTER 
DIRETTAMENTE 
DAL COMPUTER 

per Commodore Vie 20 e 64 




eat 


Bea 





























In questa lezione ti spiegherò le FUNZIONI STRINGA, cioè 
quelle istruzioni che permettono di agire sulle stringhe. 

I loro nomi sono: LEN, LEFTS, RIGHTS, MID$, STRS, VAL, ASC, 
CHR$. 

Ricordati che per stringo si intende un insieme di caratteri 
(lez. 4). 

Mentre le FUNZIONI MATEMATICHE (lez. 12) hanno un solo 
argomento (X), quelle stringo ne possono avere anche 2 
o 3, numerici o stringo, a secondo del tipo di funzione. 



<£=> 

Vediamo ora le funzioni uno per una. 

LEN (X$) : determino il numero di caratteri contenuti nello 
stringo X$. 

Quindi in : A=LEN("COMPUTER") od A verrà assegnato il 
numero 8 perchè lo stringo COMPUTER è composto da 8 
caratteri. 

LEFTS, RIGHTS e MID$ invece sono funzioni che permettono 
di generare nuove stringhe, estraendole do oltre già 
esistenti. 




LEFTS(XS,N) : ricava da XS un'altra stringa contenente gli N 
caratteri più a sinistra di X$. 

Quindi in: A$=LEFT$CHOME COMPUTER",4) ad A$ verrà 
assegnata la stringa HOME che corrisponde ai 4 caratteri 
partendo da sinistra di HOME COMPUTER. 

RIGHT$(X$,N): ricava da X$ un'altra stringa contenente gli N 
caratteri più a destra di X$. 

Quindi in: A $=RIGHT $( "HOME COMPUTER", 8) ad A$ verrà 
assegnata la stringa COMPUTER che corrisponde agli 8 
caratteri partendo da destra di HOME COMPUTER. 
MID$(X$,I,N): ricava da X$ un'altra stringa contenente gli N 
caratteri, iniziando dal carattere nella posizione I di X$. 
Quindi in: A$= CCBM HOME CBM", 5, 4) ad A$ verrà 
f assegnata la stringa HOME, che corrisponde ai 4 caratteri a 
partire dal quinto di X$. 

Cioè: CDM HOME CDM 





STR$(X) : trasforma l'argomento numerico X in uno stringa. 
Quindi in: A$=STR$(123) od A$ verrà assegnato la stringa 
123. 

Cioè: A $="123" 

VAL(X$) : è l'inverso di STR$. 

Esaminando da sinistra la stringa X$, trasforma il primo 
numero trovato in un valore numerico. 

Quindi in: A=VAL("123")ad A verrà assegnato il valore 123. 
E, dato che ora la stringa è diventata un numero, sarà 
possibile utilizzarlo per compiere calcoli matematici. 



Facciamo due esempi: 

A=VAL(' 1 —12.54SD6") risulterà A=-12.54 
A=VALCWER 5667 ") risulterà A=0 
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Con le funzioni ASC e CHR$ è possibile ricavare il codice o il 
simbolo di ogni carattere. 

ASC(X$) : ricava il codice del primo carattere dello stringa X$. 
Quindi in: A=ASCCCIAO") od A verrà assegnato il numero 
ó7 corrispondente al codice dello Ietterò C. 

CHR$(X): è l'inverso di ASC. Ricavo il carattere con il numero 
di codice X 

Quindi in: A $=CH R $(65) ad A $ verrà assegnato il carattere 
A corrispondente al codice 65. 

Questo perchè ad ogni carattere presente sullo tastiera 
corrisponde un numero di codice, chiomato CODICE ASCII 
Così olla lettera A corrisponde il numero 65, olla B il 66 e così 
via per tutti gli altri simboli 


Listato dell'esercizio: 
ESEMPIO PRATICO 
PER L'UTILIZZO DELLE 
FUNZIONI STRINGA 

10 dim n(10) 

20 s$=" 

30 for k=1 to 10 
40 input"NUMERO";n(k) 

50 next k 
60 for k=1 to 10 
70 n$=str$(n(k)) 

80 print right$(s$+n$,9) 

90 next k 


Listato dell'esercizio 
COMPLETA IL LISTATO 


10 PRINT"NUMERO INTERO"|*| 
20 INPUT |*| 

30 IF X$="0" |*| END 
40 PRINT"RISULTATO 
50 FOR Y=1 |*| LEN(X$) 

60 |*| MID$(X$,Y,1); 

70 |*|=LEN(X$)-Y 
80 IF Z/3=|*|(Z/3) THEN 110 
90 |*| Z=0 THEN 110 
100 PRINT"."; 

110 NEXT |*| 

120 PRINT:PRINT:|*| 
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Nel gioco sul VIC20 lo tuo città è attaccata da esseri alieni. 
Dovrai respingerli azionando lo scudo protettivo. 


In quello sul CBM64 cerca lo 
giusto traiettoria per 
affondare, con le bombe di 
profondità, il sommergibile. 




Soluzione dell'esercizio 
COMPLETA IL LISTATO 

(apparso nella lezione n. 14) 


10 PRINT"1 = PIU'" 

20 PRINT"2 = MENO" 

30 PRINT"3 = PER" 

40 PRINT"4 = DIVISO" 

50 INPUT"OPERAZIONE";! 
60 INPUT"NUMERO";NI 
70 INPUT"NUMER0";N2 
80 IF T=1 THEN R=N1+N2 

90 IF T=2 THEN R=N1-N2 

100 IF T=3 THEN R=N1*N2 

110 IF T=4 THEN R=N1/N2 

120 IF T>4 THEN. 10 

130 PRINT"RISULTATO";R 



TABELLA CODICI ASCII 


CAR 

COD 

CAR 

COD 

CAR 


0 

! 

33 

B 


1 

" 

34 

C 


2 

# 

35 

D 


3 

$ 

36 

E 


4 

% 

37 

F 


5 

& 

38 

G 


6 


39 

H 


7 

( 

40 

1 

disabilita 

) 

41 

J 

abilita BEI RI 9 

* 

42 

K 


10 

+ 

43 

L 


11 

, 

44 

M 


12 

- 

45 

N 


13 


46 

O 


14 

/ 

47 

P 



15 

0 

48 

Q 


16 

1 

49 

R 

SS 

17 

2 

50 

S 


18 

3 

51 

T 


19 

4 

52 

U 

Biffi! 

20 

5 

53 

V 


21 

6 

54 

w 


22 

7 

55 

X 


23 

8 

56 

Y 


24 

9 

57 

z 


25 


58 

[ 


26 

; 

59 

£ 


27 

<z 

60 

] 


28 

= 

61 

T 


29 


62 

«- 


30 

? 

63 

B 

ffl 

31 

@ 

64 

0 


32 

A 

65 

ffl 






Codici 

Codici 

Codice 


COD 

CAR 

COD 

CAR 

COD 

CAR 

COD 

66 

B 

99 


132 

□ 

165 

67 

B 

100 

fi 

133 

m 

166 

68 

□ 

101 

f3 

134 

□ 

167 

69 

B 

102 

f5 

135 


168 

70 

□ 

103 

f7 

136 

E 

169 

71 

□ 

104 

f2 

137 

□ 

170 

72 

□ 

105 

f4 

138 

ffl 

171 

73 

□ 

106 

f6 

139 

□ 

172 

74 

□ 

107 

f8 

140 

ffl 

173 

75 

□ 

108 

OSI CEDUI 

ffl 

174 

76 

S 

109 


142 

□ 

175 

77 

0 

110 


143 

ffl 

176 

78 

□ 

111 

ffl 

144 

ffl 

177 

79 

□ 

112 


145 

ffl 

178 

80 

♦ 

113 

MITO 

146 

ffl 

179 

81 

□ 

114 

no 

BEH 

147 

D 

180 

82 

S 

115 

a 

148 

E 

181 

83 

□ 

116 


149 

□ 

182 

84 

□ 

117 


150 

n 

183 

85 


118 


151 

n 

184 

86 

□ 

119 


152 

a 

185 

87 


120 


153 

□ 

186 

88 

□ 

121 


154 

E 

187 

89 

ffl 

122 


155 

a 

188 

90 

ffl 

123 


156 

a 

189 

91 

D 

124 


157 

E 

190 

92 

ffl 

125 

ffl 

158 

PS 

191 

93 

Uri 

a 

126 

ffl 

159 



94 

127 


160 



95 


128 

c 

161 



96 


129 

H 

162 



97 


130 

n 

163 



98 

_i 


131 

□ 

164 




CAR = CARATTERE 
COD = CODICE 


do 192 o223 
do 224 a 254 
255 


Identici ai codici 
Identici ai codici 
Identico al codice 


do 96 a 127 
da 160 a 190 
126 
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PIANO DIDATTICO DELL'OPERA 
DALLA LEZIONE N. 16 ALLA LEZIONE N. 30 


16) LE FUNZIONI DI STAMPA TAD E SPC, DI TEMPO E LE 
ISTRUZIONI REM, CLR, STOP, CONT 

17) TECNICHE AVANZATECI INGRESSO DATI: GET, READ, 
DATA, RESTORE 

18) SOTTOPROGRAMMI GOSUD, RETURN E ISTRUZIONI 
ON GOSUD E ON GOTO 

19) GLI OPERATORI LOGICI AND, OR, NOT 

20) DEFINIZIONE DI FUNZIONI 

21 ) FILES SEQUENZIALI SU NASTRO 

22 ) COSTRUIAMO INSIEME IL PROGRAAAMA I MIEI AMICI. 

23) INDIVIDUAZIONE DEGLI ERRORI 

24) OTTIMIZZAZIONE DEI PROGRAMMI 

25) ACCESSO ALLA MEMORIA: POKE E PEEK 

26) UTILIZZO DELLA GRAFICA 

27) UTILIZZO DEI SUONI 

28) UTILIZZO DEL DISCO 

29) FILES SU DISCO 

30) UTILIZZO DELLA STAMPANTE 

PROGRAMMI ALLEGATI ALLE LEZIONI 

17) GESTIONE MAGAZZINO : programma di gestione 
per il tuo magazzino. 

19/21/23) GRAFICA 1, GRAFICA 2, GRAFICA 0 : una 

grande monografia sulla grafica divisa in tre parti. 
Come si creano gli sprite, la tabella per i conteggi 
dei disegni, come si ottengono gli sprite a colori, la 
creazione del movimento airinterno e all'esterno 
dello sprite, la grafica geometrica, ecc... 

25) IL SUONO : una monografia su come si generano i 
suoni e il loro utilizzo. 

27) ARCHIVIO DATI : comesi memorizzano i doti di un 
programmo. 

29) L'ESAME FINALE : lo provo del nove per capire quel 
che hai imparato. 



